Контрольная работа по теме «Программное управление работой компьютера»

1 вариант

Часть А

Вопрос № 1
Что из указанного НЕ входит в алфавит языка Паскаль?

1) латинские буквы

2) служебные слова

3) русские буквы

4) знаки арифметических действий

Вопрос № 2
Какая строка из перечисленных описывает вещественную переменную на языке Паскаль?

Var x: integer;

Var x: Boolean;

Var x: real;

Var x: stringl;

Вопрос № 3
Как записывается оператор вывода?

Writeln ( )

Readln( )

While ( )

Begin ( )

Вопрос № 4
Укажите условие выбора чисел, кратных 5 и не кратных 10:

(X mod 5=0) and (X mod 10<>0);

(X mod 5<>0) or (X mod 10=0);

(X mod 5=0) and (X mod 10=0);

Вопрос № 5
Чем характеризуется переменная?

Именем, типом, значением

Типом, значением

Именем, значением

Вопрос № 6
Сколько раз повторится тело цикла в процессе выполнения фрагмента программы:
k:= 8;
while k<20 do k:=k+10;

8

6

2

10

Вопрос № 7
Операторы в Паскале разделяются:

запятой

переходом на новую строку

точкой с запятой

точкой

Вопрос № 8
Какой оператор в Паскале служит для выбора одного из двух вариантов действий?

оператор ввода

оператор вывода

условный оператор

оператор цикла

Вопрос № 9
Какое значение примет переменная Х после выполнения оператора Х=17div2?

8.5

1

8

19

Вопрос № 10
Оператор цикла с заданным числом повторений в Паскале имеет следующий формат:

While <выражение> do <оператор>;

For <параметр>:=<начальное значение> to <конечное значение> do

Repeat <оператор> until <выражение>

Вопрос № 11
Описание массива
var a: array [1..14] of integer.
Сколько элементов содержит массив?

7

14

6

5

 

Часть Б

1. В программе «:=» обозначает оператор присваивания; знаки «+», «−», «*» и «/» − соответственно операции сложения, вычитания, умножения и деления. Правила выполнения операций и порядок действий соответствует правилам арифметики.

Определите значение переменной а после выполнения алгоритма:

a := −12

b := 14 − a / 2

b := (b − a) / 8

a := b * 2 + 6

В ответе укажите одно целое число − значение переменной а.

 2. Запишите  значение  переменной  s,  полученное  в  результате  работы следующей  программы. 

Var s,k: integer;
Begin
s := 8;
for k := 3 to 8 do
s := s + 8;
writeln(s);
End.

3. В таб­ли­це Dat хра­нят­ся дан­ные из­ме­ре­ний сред­не­су­точ­ной тем­пе­ра­ту­ры за 10 дней в гра­ду­сах (Dat[1] — дан­ные за пер­вый день, Dat[2] — за вто­рой и т. д.). Определите, какое число будет на­пе­ча­та­но в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы.

Var k, m: integer;

Dat: array[1..10] of integer;

Begin

   Dat[1] := 12; Dat[2] := 15;

   Dat[3] := 17; Dat[4] := 15;

   Dat[5] := 14; Dat[6] := 12;

   Dat[7] := 10; Dat[8] := 13;

   Dat[9] := 14; Dat[10] := 15;

   m := 0;

   for k := 1 to 10 do

      if Dat[k] > 12 then

       begin

          m := m + 1;

       end;

   writeln(m);

End.

Часть В

1. Дано целое число х и натуральное число N. Напишите программу вычисления XN.

2.Напишите программу, которая определяет, является ли веденное число четным.

2 вариант

Часть А

Вопрос № 1
Целочисленные данные относятся к типу

Real

Integer

String

boolean

Вопрос № 2
Как заканчивается программа на Паскале?

Readln

End

begin

Вопрос № 3
Оператор для организации диалога с пользователем в языках программирования - это…

Оператор ввода и оператор вывода

Условный оператор

Оператор цикла

Вопрос № 4
Записать на языке Паскаль следующее выражение: y=5x^2+10x+2

Y:=5*x*x+10*x+2

Y:=5*x*x+10x+2

Y:=5x*x+10x+2

Вопрос № 5
Как записывается оператор присваивания?

а=1;

а:=1;

а=:1;

a="1";

Вопрос № 6
Формат полного оператора ветвления следующий:

If <логическое выражение> else <оператор2>;

If <логическое выражение> then <оператор1> else <оператор2>;

If <логическое выражение> then <оператор1>;

Вопрос № 7
В каком разделе происходит описание переменных?

const

vag

var

Вопрос № 8
Какое значение примет переменная а в результате выполнения фрагмента программы:
а:=4;
b:= а*2+1;
а:=а+b;

4

2

3

13

Вопрос № 9
Какое значение примет переменная k в результате выполнения фрагмента программы:
а:= 25;
if a>0 then k:=1 else k:=0

25

0

1

26

Вопрос № 10
Выберите оператор, определяющий, является ли число а четным.

if a mod 2 = 0 then write (`Да) else (`Нет`)

if a mod 2 = 1 then write (`Да) else (`Нет`)

if a mod 2 = 0 then write (`Нет) else (`Да`)

if a mod 2 = 1 then write (`Нет) else (`Да`)

Вопрос № 11
Описание массива
var a: array [1..7] of integer.
Сколько элементов содержит массив?

7

1

6

5

Часть Б

1. В программе «:=» обозначает оператор присваивания, знаки «+», «-», «*» и «/» — соответственно операции сложения, вычитания, умножения и деления. Правила выполнения операций и порядок действий соответствуют правилам арифметики. Определите значение переменной b после выполнения алгоритма:

а := 3

b := 8

а := b - a*2

b := 24/a*4

В ответе укажите одно целое число — значение переменной b.

2. Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы.

var s,k: integer;

begin

    s := 0;

    for k := 6 to 10 do

        s := s + 10;

    writeln(s);

end.

3. Школьник делал ла­бо­ра­тор­ную ра­бо­ту по физике, в ходе ко­то­рой из­ме­рил 10 раз силу тока и за­пи­сал по­ка­за­ния ам­пер­мет­ра в таб­ли­цу Tok (Tok[1] — ре­зуль­тат пер­во­го измерения, Tok[2] — вто­ро­го и т. д.). Определите, какое число будет на­пе­ча­та­но в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы.

Var k, m: integer;

Tok: array[1..10] of integer;

Begin

   Tok[1] := 10; Tok[2] := 14;

   Tok[3] := 15; Tok[4] := 4;

   Tok[5] := 12; Tok[6] := 6;

   Tok[7] := 3; Tok[8] := 5;

   Tok[9] := 5; Tok[10] := 10;

   m := 22;

   for k := 1 to 10 do

     if Tok[k] > 10 then

       begin

          m := m − 1;

       end;

   writeln(m);

End.

 

Часть В

1.Составьте алгоритм и напишите программу вычисления суммы всех натуральных чисел, не превышающих заданного натурального числа N.

2. Составьте программу определения разность наименьшего и наибольшего числа из трех.